object Form1: TForm1
  Left = 226
  Top = 106
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Gerador de "Crypt Table" aleat'#243'rio aka Crypt Table Maker'
  ClientHeight = 488
  ClientWidth = 675
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  DesignSize = (
    675
    488)
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 4
    Top = 4
    Width = 667
    Height = 110
    Anchors = [akLeft, akTop, akRight]
    BevelInner = bvLowered
    Caption = 'Panel1'
    Enabled = False
    TabOrder = 0
    object Memo1: TMemo
      Left = 2
      Top = 2
      Width = 663
      Height = 106
      Align = alClient
      Alignment = taCenter
      BorderStyle = bsNone
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Lines.Strings = (
        
          'O sistema DefinedCrypt utiliza uma tabela de caracteres ASCII fi' +
          'xos que s'#227'o usados na criptografia de textos. Os caracteres ASCI' +
          'I s'#227'o '
        
          'inclu'#237'dos aos pares como elementos dos vetores "CryptTableFull",' +
          ' "CryptTableNoControl" e "CryptTableLite" dentro da unit '
        
          'DefinedCrypt.pas. Todos os 256 caracteres ASCII s'#227'o usados pelo ' +
          'vetor "CryptTableFull", j'#225' o vetor "CryptTableNoControl" n'#227'o uti' +
          'liza '
        
          'os caracteres de controle ASCII (0 a 31) e o vetor "CryptTableLi' +
          'te" possui apenas caracteres alfanum'#233'ricos, isto '#233', letras (mai'#250 +
          'sculas e '
        
          'min'#250'sculas) e n'#250'meros. Este programa tem por finalidade gerar ca' +
          'da um desses 3 vetores com uma combina'#231#227'o '#250'nica de pares de '
        
          'caracteres ASCII, alterando 100% o a criptografia e possibilitan' +
          'do uma seguran'#231'a muito maior. Marque a op'#231#227'o "Completo" para ger' +
          'ar '
        
          '"CryptTableFull", marque a op'#231#227'o "Sem caracteres de controle" pa' +
          'ra gerar "CryptTableNoControl" e/ou marque a op'#231#227'o "Alfanum'#233'rico' +
          '" '
        'para gerar "CryptTableLite".')
      ParentFont = False
      TabOrder = 0
    end
  end
  object GroupBox1: TGroupBox
    Left = 4
    Top = 356
    Width = 388
    Height = 98
    Caption = ' Instru'#231#245'es '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 6
      Top = 16
      Width = 375
      Height = 13
      AutoSize = False
      Caption = 
        '1. Pressione o bot'#227'o "Gerar novo vetor" para criar os vetores se' +
        'lecionados.'
      WordWrap = True
    end
    object Label2: TLabel
      Left = 19
      Top = 40
      Width = 360
      Height = 26
      AutoSize = False
      Caption = 
        'Pressione o bot'#227'o "Gerar padr'#227'o" para gerar as declara'#231#245'es origi' +
        'nais dos vetores selecionados.'
      WordWrap = True
    end
    object Label3: TLabel
      Left = 19
      Top = 66
      Width = 359
      Height = 26
      AutoSize = False
      Caption = 
        'Pressione o bot'#227'o "Gerar DefinedCrypt.pas" para criar em disco t' +
        'al arquivo com as declara'#231#245'es de vetores que foram geradas anter' +
        'iormente.'
      WordWrap = True
    end
    object Label5: TLabel
      Left = 183
      Top = 28
      Width = 59
      Height = 13
      Caption = 'ou ent'#227'o...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 6
      Top = 16
      Width = 10
      Height = 13
      Caption = '1.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 6
      Top = 40
      Width = 10
      Height = 13
      Caption = '1.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label8: TLabel
      Left = 6
      Top = 66
      Width = 10
      Height = 13
      Caption = '2.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Button1: TButton
    Left = 4
    Top = 459
    Width = 135
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = 'Gerar novo vetor'
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 139
    Top = 459
    Width = 135
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = 'Gerar padr'#227'o'
    TabOrder = 3
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 536
    Top = 459
    Width = 135
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = 'Gerar CryptTables.inc'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = Button3Click
  end
  object PageControlVetores: TPageControl
    Left = 4
    Top = 118
    Width = 667
    Height = 236
    ActivePage = TabSheetFull
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    object TabSheetFull: TTabSheet
      Caption = 'Vetor completo'
      object Memo2: TMemo
        Left = 0
        Top = 0
        Width = 659
        Height = 208
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 0
        WantReturns = False
        WordWrap = False
      end
    end
    object TabSheetNoControl: TTabSheet
      Caption = 'Vetor sem caracteres de controle'
      ImageIndex = 2
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object Memo4: TMemo
        Left = 0
        Top = 0
        Width = 659
        Height = 208
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ScrollBars = ssVertical
        TabOrder = 0
        WantReturns = False
        WordWrap = False
      end
    end
    object TabSheetSafe: TTabSheet
      Caption = 'Vetor "seguro"'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ImageIndex = 2
      ParentFont = False
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object Memo3: TMemo
        Left = 0
        Top = 0
        Width = 659
        Height = 208
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
    end
  end
  object GroupBoxOpcoes: TGroupBox
    Left = 398
    Top = 356
    Width = 273
    Height = 98
    Caption = ' Vetores que ser'#227'o gerados '
    TabOrder = 6
    object CheckBoxFull: TCheckBox
      Left = 6
      Top = 16
      Width = 142
      Height = 13
      Caption = 'Completo (CryptTableFull)'
      TabOrder = 0
    end
    object CheckBoxNoControl: TCheckBox
      Left = 6
      Top = 47
      Width = 260
      Height = 13
      Caption = 'Sem caracteres de controle (CryptTableNoControl)'
      TabOrder = 1
    end
    object ButtonTodos: TButton
      Left = 192
      Top = 12
      Width = 75
      Height = 25
      Caption = 'Marcar todos'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = ButtonTodosClick
    end
    object CheckBoxSafe: TCheckBox
      Left = 6
      Top = 79
      Width = 139
      Height = 13
      Caption = 'Seguro (CryptTableSafe)'
      TabOrder = 3
    end
  end
end
